package com.qd.panda.service.wallet.plan;

import com.baomidou.mybatisplus.core.conditions.query.QueryWrapper;
import com.baomidou.mybatisplus.core.metadata.IPage;
import com.baomidou.mybatisplus.extension.plugins.pagination.Page;
import com.cdqidi.constant.ConstantDto;
import com.cdqidi.db.BaseService;
import com.cdqidi.dto.CacheKey;
import com.cdqidi.exception.ApiException;
import com.cdqidi.util.RedisTemplateUtil;
import com.cdqidi.util.SpringContextHolder;
import com.qd.common.panda.domain.entity.wallet.plan.PlanDTO;
import com.qd.common.sys.constant.UserConstants;
import com.qd.common.sys.enums.BaseTableEnum;
import com.qd.panda.mapper.wallet.plan.PlanMapper;
import com.qd.panda.model.Plan;
import com.qd.panda.service.wallet.publish.PlanPublishListService;
import com.qd.system.service.dict.MbUtil;
import com.qd.system.service.login.LoginUserService;
import com.qd.system.service.org.OrgService;
import com.qd.system.util.FileConfirmUtil;
import com.qd.upload.constant.FileConfirmDTO;
import lombok.RequiredArgsConstructor;
import lombok.extern.slf4j.Slf4j;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.util.StringUtils;

import java.util.Arrays;
import java.util.Collections;
import java.util.List;
import java.util.Optional;

import static java.util.stream.Collectors.toList;

/**
 * 充值套餐
 *
 * @author sjk
 */
@RequiredArgsConstructor
@Service
@Slf4j
public class PlanService extends BaseService<PlanMapper, Plan> {

    private static final String PREFIX_ID = "panda_plan_planCode_{0}";

    private final RedisTemplateUtil<Plan> redisTemplateUtil;
    private final LoginUserService loginUserService;
    private final OrgService orgService;

    /**
     * 保存
     *
     * @param dto 页面对象
     * @return 页面对象
     */
    @Transactional(rollbackFor = Exception.class)
    public PlanDTO save(PlanDTO dto) {
        validator(dto);
        final Plan model = dtoToModel(dto);
        try {
            if (super.save(model)) {
                return modelToDto(model);
            }
            throw new ApiException("添加失败");
        } finally {
            clearCache(model);
            model.freeData();
        }
    }

    /**
     * 修改
     *
     * @param dto 页面对象
     * @return 页面对象
     */
    @Transactional(rollbackFor = Exception.class)
    public PlanDTO update(PlanDTO dto) {
        final Plan historyModel = Optional.ofNullable(getById(dto.getPlanCode())).orElseThrow(() -> new ApiException("ID不存在,不能更新"));
        final Plan model = dtoToModel(dto);
        try {
            if (super.updateById(model)) {
                return modelToDto(model);
            }
            throw new ApiException("更新失败");
        } finally {
            clearCache(historyModel);
            historyModel.freeData();
            model.freeData();
        }
    }

    /**
     * 批量添加
     *
     * @param mList 数据库对象
     */
    @Transactional(rollbackFor = Exception.class)
    public void saveBatch(List<Plan> mList) {
        try {
            if (!super.saveBatch(mList)) {
                throw new ApiException("批量添加失败");
            }
        } finally {
            clearCaches(mList);
        }
    }

    /**
     * 批量更新
     *
     * @param mList 数据库对象
     */
    @Transactional(rollbackFor = Exception.class)
    public void updateBatchIds(List<Plan> mList) {
        final List<String> ids = mList.stream().map(Plan::getPlanCode).collect(toList());
        final List<Plan> historyModelList = checkIds(ids);
        try {
            if (!super.updateBatchById(mList)) {
                throw new ApiException("批量更新失败");
            }
        } finally {
            clearCaches(historyModelList);
            historyModelList.clear();
            ids.clear();
        }
    }

    /**
     * 删除，单个
     *
     * @param planCode 主键
     */
    @Transactional(rollbackFor = Exception.class)
    public void removeById(String planCode) {
        if(SpringContextHolder.getBean(PlanPublishListService.class).isExistsByPlanCode(planCode)){
            throw new ApiException("已存在发布计划,不能删除");
        }
        final Plan historyModel = Optional.ofNullable(getById(planCode)).orElseThrow(() -> new ApiException("数据不存在,不能删除"));
        try {
            if (!super.removeById(planCode)) {
                throw new ApiException("删除失败");
            }
        } finally {
            clearCache(historyModel);
            historyModel.freeData();
        }
    }

    /**
     * 批量删除
     *
     * @param ids 主键集合
     */
    @Transactional(rollbackFor = Exception.class)
    public void removeBatchIds(List<String> ids) {
        ids.forEach(this::removeById);
    }

    /**
     * 根据传入对象构建查询参数，判断是否存在
     *
     * @param dto 参数
     * @return 存在为true
     */
    @Transactional(readOnly = true)
    public Boolean isExists(PlanDTO dto) {
        final QueryWrapper<Plan> queryWrapper = createQueryWrapper(dto);
        final boolean exists = super.count(queryWrapper) > 0;
        queryWrapper.clear();
        return exists;
    }

    /**
     * 根据主键判断数据是否存在
     *
     * @param planCode 主键
     * @return 存在为true
     */
    @Transactional(readOnly = true)
    public Boolean isExistsById(String planCode) {
        boolean exists = false;
        if (StringUtils.hasLength(planCode)) {
            final Plan model = getById(planCode);
            exists = (null != model);
            if (exists) {
                model.freeData();
            }
        }
        return exists;
    }

    /**
     * 根据主键获取数据
     *
     * @param planCode 主键
     * @return 单条记录
     */
    @Transactional(readOnly = true)
    public Plan getById(String planCode) {
        final String key = RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, planCode);
        return redisTemplateUtil.get(new CacheKey().setKey(key).setTimeout(ConstantDto.REDIS_TIME_OUT_DAY), () -> super.getById(planCode), Plan.class);
    }

    /**
     * 根据主键获取数据
     *
     * @param planCode 主键
     * @return 单条记录，转换成页面对象
     */
    @Transactional(readOnly = true)
    public PlanDTO getByIdDto(String planCode) {
        return Optional.ofNullable(getById(planCode)).map(this::modelToDto).orElse(null);
    }

    /**
     * 根据条件查询单条数据
     *
     * @param dto 查询参数
     * @return 单条记录
     */
    @Transactional(readOnly = true)
    public Plan getOne(PlanDTO dto) {
        final QueryWrapper<Plan> queryWrapper = createQueryWrapper(dto);
        Plan model = super.getOne(queryWrapper);
        queryWrapper.clear();
        return model;
    }

    /**
     * 根据条件查询单条数据
     *
     * @param dto 查询参数
     * @return 单条记录，转换成页面对象
     */
    @Transactional(readOnly = true)
    public PlanDTO getOneDto(PlanDTO dto) {
        return Optional.ofNullable(getOne(dto)).map(this::modelToDto).orElse(null);
    }

    /**
     * 根据条件查询列表数据
     *
     * @param dto 查询参数
     * @return 列表数据
     */
    @Transactional(readOnly = true)
    public List<Plan> getList(PlanDTO dto) {
        final QueryWrapper<Plan> queryWrapper = createQueryWrapper(dto);
        final List<Plan> list = super.list(queryWrapper);
        queryWrapper.clear();
        return list;
    }

    /**
     * 根据条件查询列表数据
     *
     * @param dto 查询参数
     * @return 列表数据，转换成页面对象
     */
    @Transactional(readOnly = true)
    public List<PlanDTO> getListDto(PlanDTO dto) {
        return modelToDtoList(getList(dto));
    }

    /**
     * 分页数据
     *
     * @param page 分页对象
     * @param dto  查询参数
     * @return 分页信息
     */
    @Transactional(readOnly = true)
    public IPage<PlanDTO> page(Page<Plan> page, PlanDTO dto) {
        final QueryWrapper<Plan> queryWrapper = createQueryWrapper(dto);
        Page<Plan> iPage = baseMapper.selectPage(page, queryWrapper);
        Optional.ofNullable(iPage.getRecords()).ifPresent(this::modelToDtoList);
        queryWrapper.clear();
        return iPage.convert(this::modelToDto);
    }

    /**
     * 清空缓存
     *
     * @param model 数据库对象
     */
    public void clearCache(Plan model) {
        if (null == model) {
            return;
        }
        redisTemplateUtil.deleteByKey(RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, model.getPlanCode()));
    }

    /**
     * 批量清空缓存
     *
     * @param list 数据库对象
     */
    public void clearCaches(List<Plan> list) {
        if (null == list || list.isEmpty()) {
            return;
        }
        List<String> ids = list.stream().map(model -> RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, model.getPlanCode())).collect(toList());
        if (!ids.isEmpty()) {
            redisTemplateUtil.deleteByKey(ids);
            ids.clear();
        }
    }

    /**
     * 数据库对象转页面对象
     *
     * @param model 数据库对象
     * @return 页面对象
     */
    public PlanDTO modelToDto(Plan model) {
        if (null == model) {
            return null;
        }
        final PlanDTO dto = new PlanDTO();
        dto.setPlanCode(model.getPlanCode());
        dto.setPlanName(model.getPlanName());
        dto.setPlateNote(model.getPlateNote());
        dto.setPlateCover(model.getPlateCover());
        dto.setPlateAmount(model.getPlateAmount());
        dto.setDeductionAmount(model.getDeductionAmount());
        dto.setGiftRatio(model.getGiftRatio());
        dto.setAddTime(model.getAddTime());
        dto.setUpdateTime(model.getUpdateTime());
        dto.setStartAmount(model.getStartAmount());
        dto.setIdx(model.getIdx());
        dto.setOperator(model.getOperator());
        dto.setOperateOrgId(model.getOperateOrgId());
        dto.setEnable(model.getEnable());
        buildDisplay(dto);
        return dto;
    }

    /**
     * 页面对象转数据库对象
     *
     * @param dto 页面对象
     * @return 数据库对象
     */
    public Plan dtoToModel(PlanDTO dto) {
        if (null == dto) {
            return null;
        }
        final Plan model = new Plan();
        model.setPlanCode(dto.getPlanCode());
        model.setPlanName(dto.getPlanName());
        model.setPlateNote(dto.getPlateNote());
        model.setPlateCover(dto.getPlateCover());
        model.setPlateAmount(dto.getPlateAmount());
        model.setDeductionAmount(dto.getDeductionAmount());
        model.setGiftRatio(dto.getGiftRatio());
        model.setAddTime(dto.getAddTime());
        model.setUpdateTime(dto.getUpdateTime());
        model.setStartAmount(dto.getStartAmount());
        model.setIdx(dto.getIdx());
        model.setOperator(dto.getOperator());
        model.setOperateOrgId(dto.getOperateOrgId());
        model.setEnable(dto.getEnable());
        return model;
    }

    /**
     * 码表转换
     *
     * @param dto 页面对象
     */
    public void buildDisplay(PlanDTO dto) {
        dto.setEnableDisplay(MbUtil.idToDisplay(dto.getEnable()));
        dto.setOperatorDisplay(loginUserService.idToDisplay(dto.getOperator()));
        dto.setOperateOrgIdDisplay(orgService.idToDisplay(dto.getOperateOrgId()));
        if (StringUtils.hasLength(dto.getPlateCover())) {
            dto.setPlateCoverDisplay(FileConfirmUtil.getImageFile(dto.getPlateCover()));
        }
    }

    /**
     * 数据库对象转页面对象
     *
     * @param list 数据库对象
     * @return 页面对象
     */
    public List<PlanDTO> modelToDtoList(List<Plan> list) {
        return Optional.ofNullable(list).orElse(Collections.emptyList()).stream().map(this::modelToDto).collect(toList());
    }

    /**
     * 页面对象转数据库对象
     *
     * @param list 页面对象
     * @return 数据库对象
     */
    public List<Plan> dtoToModelList(List<PlanDTO> list) {
        return Optional.ofNullable(list).orElse(Collections.emptyList()).stream().map(this::dtoToModel).collect(toList());
    }

    /**
     * 拼装查询参数，除了主键的其他字段会自动加入进来
     *
     * @param dto 查询参数，不为空的属性会被自动加入
     */
    public QueryWrapper<Plan> createQueryWrapper(PlanDTO dto) {
        final QueryWrapper<Plan> queryWrapper = new QueryWrapper<>();
        if (null != dto) {
            if (StringUtils.hasLength(dto.getPlanCode())) {
                queryWrapper.eq("plan_code", dto.getPlanCode());
            }
            if (StringUtils.hasLength(dto.getPlanName())) {
                queryWrapper.like("plan_name", dto.getPlanName());
            }
            if (StringUtils.hasLength(dto.getEnable())) {
                queryWrapper.eq("enable", dto.getEnable());
            }
        }
        queryWrapper.orderByAsc("idx");
        queryWrapper.orderByDesc("add_time");
        return queryWrapper;
    }

    /**
     * 批量检查主键在数据库中是否存在
     *
     * @param ids 主键集合
     * @return 主键查询出来的集合
     */
    public List<Plan> checkIds(List<String> ids) {
        if (null == ids || ids.isEmpty()) {
            throw new ApiException("ids不能为空");
        }
        final List<Plan> list = super.listByIds(ids);
        if (list.isEmpty()) {
            throw new ApiException("ids不存在" + Arrays.toString(ids.toArray()));
        }
        if (ids.size() == list.size()) {
            return list;
        }
        List<String> dbIds = list.stream().map(Plan::getPlanCode).collect(toList());
        final List<String> notExistsList = ids.stream().filter(id -> !dbIds.contains(id)).collect(toList());
        dbIds.clear();
        if (!notExistsList.isEmpty()) {
            throw new ApiException("ids不存在" + Arrays.toString(notExistsList.toArray()));
        }
        return list;
    }

    @Transactional(readOnly = true)
    public String idToDisplay(String planCode) {
        return Optional.ofNullable(getById(planCode)).map(Plan::getPlanName).orElse("");
    }

    private void validator(PlanDTO dto) {
        if (MbUtil.isNotExists(dto.getEnable(), BaseTableEnum.SF)) {
            throw new ApiException("是否启用值错误");
        }
        if (null != dto.getDeductionAmount() && dto.getDeductionAmount() < 0) {
            throw new ApiException("减免金额不能小于0元");
        }
        if (null != dto.getPlateAmount() && dto.getPlateAmount() < 0) {
            throw new ApiException("套餐金额不能小于0元");
        }
        if (null != dto.getStartAmount() && dto.getStartAmount() < 0) {
            throw new ApiException("优惠起始金额不能小于0元");
        }
        if (null != dto.getStartAmount() && null != dto.getPlateAmount()) {
            if (dto.getStartAmount() > dto.getPlateAmount()) {
                throw new ApiException("优惠起始金额不能大于套餐金额");
            }
        }
        if (null != dto.getDeductionAmount() && null != dto.getPlateAmount()) {
            if (dto.getDeductionAmount() > dto.getPlateAmount()) {
                throw new ApiException("优惠金额不能大于套餐金额");
            }
        }
        if (null != dto.getGiftRatio()) {
            if (dto.getGiftRatio() < 0) {
                throw new ApiException("赠送比例不能小于0");
            }
            if (dto.getGiftRatio() > 100) {
                throw new ApiException("赠送比例不能大于100");
            }
        }
        if(StringUtils.hasLength(dto.getPlateCover()) && !dto.getPlateCover().startsWith("/") && !dto.getPlateCover().startsWith("//")){
            FileConfirmDTO fileConfirm = getFileConfirm(dto.getPlateCover());
            dto.setPlateCover(fileConfirm.getOfficialFile());
        }
    }

    @Transactional(rollbackFor = Exception.class)
    public void enable(PlanDTO dto) {
        PlanDTO plan = Optional.ofNullable(getByIdDto(dto.getPlanCode())).orElseThrow(() -> new ApiException("套餐编码值错误"));
        if(!plan.getEnable().equals(dto.getEnable())){
            plan.setEnable(dto.getEnable());
            plan.setUpdateTime(dto.getUpdateTime());
            plan.setOperator(dto.getOperator());
            plan.setOperateOrgId(dto.getOperateOrgId());
            update(plan);
        }
        plan.freeData();
    }

    private FileConfirmDTO getFileConfirm(String plateCover) {
        final FileConfirmDTO fileConfirm = FileConfirmUtil.singleFileConfirm(plateCover, UserConstants.IMAGE);
        if (null == fileConfirm) {
            throw new ApiException("上传封面确认失败");
        }
        return fileConfirm;
    }
}